﻿Public Module L3DGraphics
    Public Const L3DPlanYearLineVerticalPosition = 20
    Public Const L3DPlanMonthLineVerticalPosition = 40
    Public Const FirstElementVerticalPosition = L3DPlanMonthLineVerticalPosition + 5
    Public Const L3DPlanMilestoneHeight = 20
    Public Const L3DPlanGroupHeight = 40

    Public Const AlphaCursor As Integer = 80
    Public Const GroupHeight As Integer = 30
    Public Const GroupMinTop As Integer = 4
    Public GroupElementOffset As New Drawing.Point(GroupMinLeft, GroupMinTop)
    Public Const GroupMinLeft = 4
    Public Const GroupDistance = 4
    Public Const CarHeight As Integer = 20
    Public Const CarWidth As Integer = 40
    Public Const CarMinTop = 3
    Public Const CarMinLeft As Integer = 13
    Public CarGroupOffset As New System.Drawing.Point(CarMinLeft, CarMinTop)
    Public Const CarDistance = 6
    Public Const ElementDistance = 6
    Public Const ElementNameHeight = 20
    Public Const TranslateElementOffset = 30
    Public Const MilestoneWidth = 100
    Public Const MilestoneHeight = 60
    Public Const MilestoneNameHeight = 20
    Public Const MilestoneSymbolWidth As Integer = 20
    Public Const MilestoneSymbolHeight As Integer = 20
    Public Const MilestoneSymbolMargin As Integer = 10
End Module
Public Module MilestoneConstantValues
    Enum SpecialIDValues As Integer
        None = 1
        Start = 2
        DAP = 3
        SOP = 4
        VP = 5
        PS = 6
    End Enum
End Module
Public Module ProjectConstantValues
    Enum ProjectStatusValues As Integer
        L3DStatusGreen = 1
        L3DStatusYellow = 2
        L3DStatusRed = 3
    End Enum
    Public Const L3DPlanMaxNumberOfYears = 6
    Public Const L3DPlanMinNumberOfYears = 2
End Module

